From 9d2e2b32b9f6a4dd11559cad8acc4a5cb97a2402 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Sun, 25 Feb 2007 09:24:11 +0000 Subject: [PATCH] =?utf8?q?(hack-one-local-variable-eval-safep):=20Correct?= =?utf8?q?=20handling=20of=20edebug-form-spec=20property=20value.=20=20Rep?= =?utf8?q?orted=20by=20Johan=20Bockg=C3=A5rd=20.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- lisp/files.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/files.el b/lisp/files.el index 6d5b101d3c1..adec33ef77b 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -2787,7 +2787,8 @@ It is dangerous if either of these conditions are met: ;; During bootstrapping, edebug-basic-spec might not be ;; defined yet. (and (fboundp 'edebug-basic-spec) - (edebug-basic-spec val)))))) + (hack-one-local-variable-quotep val) + (edebug-basic-spec (nth 1 val))))))) ;; Allow expressions that the user requested. (member exp safe-local-eval-forms) ;; Certain functions can be allowed with safe arguments -- 2.30.2